home *** CD-ROM | disk | FTP | other *** search
/ F1 Licenseware / F1 Licenseware - Volume 1.iso / disks / 073a.dms / 073a.adf / s / startup-sequence < prev   
Text File  |  1992-02-26  |  2KB  |  43 lines
  1. Setpatch >NIL:                         ; ROM patch
  2. c:version >NIL:                   ; find versions
  3.  
  4. C:addbuffers >NIL: df0: 20           ; speed up accessing
  5. Failat 21                   ; in case of error, don't halt script
  6.  
  7. makedir ram:T ram:Clipboards ram:env ram:env/sys   ; Some system drawers
  8. Copy >NIL: ENVARC: ram:env all quiet noreq   ; Preferences info
  9. assign ENV: ram:env                    ; Prefs
  10. assign T: ram:T                        ; T directory for scripts
  11. assign CLIPS: ram:clipboards           ; clip board for Conclip etc.
  12. assign >NIL: KEYMAPS: DEVS:Keymaps     ; various system assigns...
  13. assign >NIL: PRINTERS: DEVS:printers
  14. assign >NIL: LOCALE: SYS:Locale
  15. Assign >NIL: LIBS: SYS:classes ADD
  16. Assign >NIL: HELP: LOCALE:Help DEFER
  17.  
  18. BindDrivers
  19.  
  20. Setenv Workbench $Workbench
  21. Setenv Kickstart $Kickstart
  22.  
  23. Iprefs                                 ; Load in preferences information
  24.  
  25. echo "Amiga Release 2/3.  Kickstart $Kickstart, Workbench $Workbench"
  26.  
  27. conclip
  28.  
  29. Path RAM: C: SYS: S: SYS:System Add    ; Set the search path
  30.  
  31. System/SetMap gb                       ; set a British keymap
  32. PPshow SYS:pics/title                  ; show the F1 copyright picture
  33. cls                                    ; clear the screen
  34. Type s:Message                         ; display a message
  35. NewShell >NIL: FROM S:CLIndex.startup "CON:0/200/640/56/CLIndex Pro v2.0/CLOSE"
  36.                                        ; Make a small CLI window
  37.                                        ; at 0,200 size 640 by 56 pixels.
  38.                                        ; Title CLIndex with close gadget
  39. Wait 5                                 ; avoid disk grinding and let user
  40.                                        ; read message on screen
  41. LoadWB                                 ; Load up the Workbench
  42. EndCLI >NIL:                           ; Close the big CLI window
  43.